function Pgcd(A,B : Natural) return Natural;


